home *** CD-ROM | disk | FTP | other *** search
/ United Public Domain Gold 2 / United Public Domain Gold 2.iso / utilities / pu563.dms / pu563.adf / MultipleDemo / Defs.pas < prev    next >
Pascal/Delphi Source File  |  1994-05-18  |  645b  |  20 lines
  1. unit defs;
  2.  
  3. interface
  4.  
  5. Uses exec,intuition,gadtools,graphics,amiga,diskfont,
  6.      workbench,utility;
  7.  
  8. type
  9.   pwindownode = ^twindownode;         { type definition for the node   }
  10.   twindownode = record                { in a seperate unit so it can   }
  11.     ln_succ   : pwindownode;          { be used in the produced unit   }
  12.     ln_pred   : pwindownode;          { enabling an extra parameter    }
  13.     pwin      : pwindow;              { to be passed allowing multiple }
  14.     pwinglist : pgadget;              { windows to work                }
  15.     pwingads  : array [0..10] of pgadget;
  16.     pwinvisualinfo : pointer;
  17.    end;
  18.  
  19. implementation
  20. end.